100 REM LONDONDERRY AIR 101 REM TRANSCRIBED FOR C-64 BY R.KEAYS 102 REM DRIVER BY BUTTERFIELD 105 PRINT"[147] CONCERT IN PROGRESS!" 108 FORVO=1TO15:POKE54296,VO:NEXTVO 110 L1=54272:L2=54279:L3=54286 120 H1=L1+1:H2=L2+1:H3=L3+1 130 V1=L1+4:V2=L2+4:V3=L3+4 150 POKEV1+1,9:POKEV1+2,170 160 POKEV2+1,26:POKEV2+2,170 170 POKEV3+1,26:POKEV3+2,170 180 T=TI:F=30 200 POKEV1,32:POKEV2,32:POKEV3,32 210 READS:IFS=0GOTO290 220 READX1,Y1,X2,Y2,X3,Y3 230 IFX1THENPOKEH1,X1:POKEL1,Y1:POKEV1,33 240 IFX2THENPOKEH2,X2:POKEL2,Y2:POKEV2,33 250 IFX3THENPOKEH3,X3:POKEL3,Y3:POKEV3,33 260 T=T+S/10*F 270 IFT>TIGOTO270 280 GOTO200 290 FORJ=L1 TO 54295:POKE J,0:NEXT J:FORVO=15TO1STEP-1:POKE54296,VO:NEXT:END 300 REM DURATION,HI1,LO1,...,HI3,LO3 303 : 306 : 8000 REM MUSIC DATA STARTS HERE 8001 DATA60,0,0,0,0,0,0:REM PAUSE BEFORE START 8002 DATA10,40,200,0,0,34,75 8006 DATA05,51,97,38,126,30,141 8010 DATA05,54,111,34,75,27,56 8014 DATA05,61,126,30,141,25,177 8018 DATA05,68,149,27,56,22,227 8022 DATA10,61,126,30,141,25,177 8026 DATA05,68,149,27,56,22,227 8030 DATA05,45,198,34,75,20,100 8034 DATA05,51,97,38,126,19,63 8038 DATA10,45,198,27,56,20,100 8046 DATA05,34,75,27,56,20,100 8050 DATA05,19,63,15,70,13,156 8054 DATA05,20,100,17,37,12,216 8058 DATA05,22,227,19,63,11,114 8062 DATA10,25,177,12,216,10,60 8066 DATA05,22,227,0,0,0,0 8070 DATA05,25,177,20,100,15,70 8074 DATA05,34,75,27,56,19,63 8078 DATA05,30,141,20,100,0,0 8082 DATA05,25,177,19,63,15,70 8086 DATA05,22,227,17,37,0,0 8090 DATA05,20,100,15,70,0,0 8094 DATA10,17,37,13,156,0,0 8102 DATA05,17,37,11,114,6,206 8106 DATA05,20,100,10,60,8,147 8110 DATA05,25,177,19,63,7,163 8114 DATA05,27,56,17,37,6,206 8118 DATA05,30,141,10,60,6,108 8122 DATA05,34,75,17,37,11,114 8126 DATA05,30,141,15,70,6,108 8130 DATA05,25,177,19,63,7,163 8134 DATA05,20,100,19,63,8,147 8138 DATA05,25,177,17,37,5,185 8142 DATA25,22,227,17,37,7,163 8150 DATA05,19,63,15,70,13,156 8154 DATA05,20,100,17,37,12,216 8158 DATA05,22,227,19,63,11,114 8162 DATA10,25,177,12,216,0,0 8166 DATA05,22,227,9,159,0,0 8170 DATA05,25,177,15,70,10,60 8174 DATA05,34,75,17,37,11,114 8178 DATA05,30,141,15,70,6,108 8182 DATA05,25,177,19,63,6,108 8186 DATA05,22,227,17,37,8,147 8190 DATA05,20,100,30,141,10,60 8194 DATA05,17,37,13,156,5,185 8198 DATA05,16,47,9,159,6,108 8202 DATA05,17,37,12,216,8,147 8206 DATA05,19,63,13,156,11,114 8210 DATA05,20,100,15,70,12,216 8214 DATA05,22,227,20,100,13,156 8218 DATA15,25,177,15,70,8,147 8222 DATA05,27,56,19,63,13,156 8226 DATA05,25,177,15,70,6,108 8230 DATA05,22,227,17,37,6,206 8234 DATA05,20,100,12,216,8,147 8238 DATA05,22,227,19,63,7,163 8242 DATA25,20,100,15,70,12,216 8250 DATA05,30,141,27,56,17,37 8254 DATA05,34,75,25,177,15,70 8258 DATA05,38,126,22,227,13,156 8262 DATA15,40,200,30,141,12,216 8266 DATA05,38,126,12,216,0,0 8270 DATA05,38,126,20,100,13,156 8274 DATA05,34,75,22,227,19,63 8278 DATA05,30,141,12,216,0,0 8282 DATA05,25,177,20,100,17,37 8286 DATA05,30,141,19,63,15,70 8290 DATA05,25,177,15,70,0,0 8294 DATA10,20,100,15,70,8,147 8298 DATA05,15,70,12,216,8,147 8302 DATA05,30,141,17,37,11,114 8306 DATA05,34,75,25,177,12,216 8310 DATA05,38,126,22,227,13,156 8314 DATA15,40,200,20,100,12,216 8318 DATA05,38,126,19,63,6,108 8322 DATA05,38,126,15,70,6,206 8326 DATA05,34,75,17,37,13,156 8330 DATA05,30,141,15,70,8,147 8334 DATA05,25,177,20,100,15,70 8338 DATA25,22,227,13,156,5,185 8346 DATA05,30,141,20,100,7,163 8350 DATA05,30,141,25,177,15,70 8354 DATA05,30,141,22,227,13,156 8358 DATA15,51,97,25,177,7,163 8362 DATA05,45,198,22,227,6,206 8366 DATA05,45,198,22,227,6,108 8370 DATA05,40,200,30,141,20,100 8374 DATA05,34,75,20,100,6,206 8378 DATA05,40,200,27,56,19,63 8382 DATA05,30,141,20,100,6,108 8386 DATA05,25,177,19,63,0,0 8390 DATA15,20,100,8,147,0,0 8398 DATA05,19,63,11,114,6,206 8402 DATA05,20,100,12,216,6,108 8406 DATA05,22,227,14,107,5,185 8410 DATA05,25,177,22,227,7,163 8414 DATA05,34,75,0,0,0,0 8418 DATA05,30,141,19,63,6,206 8422 DATA05,25,177,10,60,0,0 8426 DATA05,22,227,11,114,6,206 8430 DATA05,20,100,15,70,6,108 8434 DATA05,17,37,13,156,5,185 8438 DATA05,19,63,7,163,0,0 8442 DATA25,20,100,12,216,5,25 8450 DATA10,40,200,34,75,0,0 8454 DATA05,51,97,38,126,30,141 8458 DATA05,54,111,34,75,27,56 8462 DATA10,61,126,40,200,25,177 8466 DATA05,38,126,28,214,22,227 8470 DATA05,34,75,25,177,20,100 8474 DATA05,68,149,27,56,22,227 8478 DATA05,61,126,30,141,25,177 8482 DATA05,38,126,27,56,22,227 8486 DATA05,34,75,25,177,20,100 8490 DATA05,68,149,27,56,22,227 8494 DATA05,61,126,30,141,25,177 8498 DATA05,68,149,27,56,22,227 8502 DATA05,45,198,27,56,20,100 8506 DATA05,38,126,22,227,0,0 8510 DATA05,34,75,27,56,20,100 8514 DATA05,51,97,30,141,19,63 8518 DATA05,45,198,27,56,20,100 8522 DATA05,51,97,30,141,19,63 8526 DATA05,45,198,27,56,20,100 8530 DATA05,51,97,30,141,19,63 8534 DATA20,40,200,25,177,17,37 8538 DATA30,34,75,20,100,11,114 8542 DATA20,38,126,19,63,7,163 8546 DATA40,40,200,20,100,5,25 8550 DATA10,0,0,0,0,0,0 8554 DATA10,0,0,0,0,0,0 8558 DATA10,0,0,0,0,0,0 8562 DATA10,0,0,0,0,0,0 8566 DATA10,0,0,0,0,0,0 8570 DATA10,0,0,0,0,0,0 8574 DATA10,0,0,0,0,0,0 9995 DATA0:REM STOP THE MUSIC 9998 :